﻿Public Class CFechaBorrado
    Private _intId          As Integer
    Private _strDescripcion As String

    Public Property Id As Integer
        Get
            Id = Me._intId
        End Get
        Set(value As Integer)
            Me._intId = value
        End Set
    End Property

    Public Property Descripcion As String
        Get
            Descripcion = Me._strDescripcion
        End Get
        Set(value As String)
            Me._strDescripcion = value
        End Set
    End Property

    Public Overrides Function ToString() As String
        Return Descripcion
    End Function
End Class
